Colson Caster Selection Guide 3/Colson Caster Selection Guide 3.0.iso/colsoncd.dxr/00001Series_31_Wood.ls

Text File | 2000-01-11 | 1.6 KB | 29 lines

on mouseUp
  if the hilite of cast "wood" = 1 then
    set the visible of sprite 54 to 0
    set the visible of sprite 55 to 0
    set the visible of sprite 50 to 0
    set the visible of sprite 51 to 0
    set the visible of sprite 72 to 0
    set the visible of sprite 73 to 0
  end if
  if the hilite of cast "wood" = 0 then
    if (the hilite of cast "asphalt" = 0) and (the hilite of cast "terrazzo" = 0) and (the hilite of cast "wood" = 0) and (the hilite of cast "tile" = 0) and (the hilite of cast "extremetemp" = 0) and (the hilite of cast "noisereduction" = 0) and (the hilite of cast "floorprotection" = 0) and (the hilite of cast "cushionload" = 0) then
      set the visible of sprite 54 to 1
      set the visible of sprite 55 to 1
    end if
  end if
  if the hilite of cast "wood" = 0 then
    if (the hilite of cast "asphalt" = 0) and (the hilite of cast "terrazzo" = 0) and (the hilite of cast "wood" = 0) and (the hilite of cast "tile" = 0) and (the hilite of cast "metalchips" = 0) and (the hilite of cast "extremetemp" = 0) and (the hilite of cast "noisereduction" = 0) and (the hilite of cast "cushionload" = 0) then
      set the visible of sprite 50 to 1
      set the visible of sprite 51 to 1
    end if
  end if
  if the hilite of cast "wood" = 0 then
    if (the hilite of cast "asphalt" = 0) and (the hilite of cast "terrazzo" = 0) and (the hilite of cast "wood" = 0) and (the hilite of cast "tile" = 0) and (the hilite of cast "noisereduction" = 0) and (the hilite of cast "floorprotection" = 0) and (the hilite of cast "cushionload" = 0) then
      set the visible of sprite 72 to 1
      set the visible of sprite 73 to 1
    end if
  end if
end